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insertion (prefix) { 
local jnsertionnode 
/* STEP1 •/ 

Insertionnode := F/nd/N/ode(prefix) 

/* STEP2 V 

/* Check new route's nexthop */ 

If (/s/ode/S/exf/>opViiWua/(lnsertlonnode) = TRUE) than 

insert/o/7 A/ode\//rfua/<inssrtionnode) 

/nsert/or>A/ode//7Jer-do/7ja/AJ(insertionnode) 
r STEP3 •/ 

if (run_step3 = TRUE) then 
C/7//dA/od©Hand/©/<in5ertionnode) 

} 
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r 



Deletion (prefix) { 
local deletenode, siblingnode 
/• STEP1 •/ 

deletenode := FindNodeiprefix) 
r STEP2 */ 

If (D«A/Fonvard(deletenode) = TRUE) then 
if {ForwardingTabl0Farwardide\eter\o(ie) = TRUE) 

then 

DeleteFofwardlngTablB(<ieletenode) 
SendDRA/(deletenod6) 
else 

/* Deletion of the parent node instead of 

/• the deletenode *f 
DelateForwaftlingTableiGQtPar0nt(de\etenoae)) 

else 

/• In case of the deletion of the aggregation node, */ 
/• sertding infonnation to DRN can be suppressed */ 
If (FoAvard/ng7a/)/eFonfvafd(delet©node) = TRUE) 

then 

D0ieteForwardingTablBi6e\eteno<ie) 

siblingnode := S«)//ng^/ddfiC/jec/c(deletenode) 
/ * Delayed Insertion of the sibling node */ 
if (siblingnode * NIL) then 
Se/idDRA/(sibllngnode) 
/* STEP3 */ 

ChildNodeHandler (deletenode) 

> 
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FindNode (prefix) { 
local node 

/* Search for node to be inserted */ 

node GetNode (prefix) 

/♦ Identity the insertion node */ 

If ((node ? NIL) and iNodeiypeiuode) = AGG)) 

Empty (node) 

run_step3 := TRUE 

else 

NewNodeCnodei) 
return (node) 



} 




MakeParentNode (node) { 
local parentnode 



/* Make parent node and set node type to AGG 
parentnode AllocateParentNodeixxode) 
NodeTypeQps^niaode) := AGG 
Farent{node) parentnode 
r e t u r n(parentnode) 

) 
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InsertNodeVirtuI (node) { 
local parencnode 
parenmode := GetPareM(node) 
it (parentnode ? NIL) then 
If (NodeScurce(paientnode) ? NodeSourceinode)) then 



/* There is not parent node. ♦/ 
else 

/* Make and wirte parent node to the forwarding table ♦/ 
parentnode :=> MakeParentNodeinode) 
ImgertForwardingTablefpmutnodc) 



InsertNodelnter-domain (node) { 
local parentnode 
parentnode := GetParentinode) 
if (parentnode 7 NIL) then 

/♦ If new route source and parent are same, •/ 
/• new route sending to DRN can be suppressed ♦/ 
if (/^oi/eSottrce(parentnode) ? NodeSourceinode)) then 

SendDRN(hode) 
InsertForwardrngTableinodo) 

else 

/♦ Make parent node and wirte new node ♦/ 
/♦ to the forwarding table •/ 

parentnode MakeParentNodeiuodo) 

IptsertForwardingTableinodei) 

SertdDRNinode) 



InsertForwardingTaMeinode) 



) 
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ForwardingTableForwBrdGheck(node) 

1 

local parentnode 

parentnode := GetParerit{iiodt) 

if ((ForwardingTableFonvardinode) = FALSE) 

and iNodeSoutce(node) 1= /^o</eSowrce(parentnode))) then 



DRNFonvardChecfc(node) 
{ 

local parentnode 

parentnode :- GetParent(node) 

if iiPRl^Forwardinode) = FALSE) 

and {NodeNexthopVirtuaKnoAc) = FALSE)) then 

return (FALSE) 



return (FALSE) 



else 



return (TRUE) 




else 



return (TRUE) 



> 
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ChildNodeHandler (node) { 
local leftchild, rightchild 
leftchild CetLeftChildNode(pode) 
rightchild OetRightChildNodeinods) 
if (leftchild ? NIL) then 

/* Disaggregation of the leftchild node */ 
if (JiForwardingTableForwardCh^cKisftchM) = FALSE) 
Inser(ForwardmgTable(\e^Ghild) 
I* Delayed insertion of Ae leftchild node */ 
if {I^DR]^ForwardChecki\efldam = FALSE) then 
Sen</£>/{N(leftchUd) 
if (rightchild ? NIL) then 

/♦ Disaggregation of the rightchild node ♦/ 
if {iForwardmgTableForwardCheckis^gl^Xc)ax\&') = FALSE) 
ImettForwcirdingTabl^n^ttAiM) 
r Delayed insertion of the rightchild node •/ 
If HDRNForwardChecm^tcbjld) = FALSE) then 
Se/K/D/WCrightchild) 




SiblingNodeCheck (node) { 
local siblingnode 

siblingnode := GetSiblingNodeitiode) 
/* Check if there is aggregated sibling node */ 
if ((NodeSowceinode) » NocleSource(sihlm$po<ic)) 
and {DRNForward(sih]iR&iod9) = FALSE)) then 
return (siblingnode) 

else 

return (FALSE) ^ 




